10 PRINT"[147]":PRINT"":PRINT:PRINT:POKE53281,8 20 PRINT" MR.JOKER PRESENTS":PRINT:PRINT:PRINT 25 PRINT"[144] [205][205][205][205][205][205][205][205][205][205][205][205][206][206][206][206][206][206][206][206][206][206][206][206]" 27 PRINT 30 PRINT"[149] [195] [178][171][179]E [204][194][205][206]E [215]F A [178][171][179][194]EF [195]" 35 PRINT 40 PRINT"[144] [206][206][206][206][206][206][206][206][206][206][206][206][205][205][205][205][205][205][205][205][205][205][205][205]":PRINT 50 PRINT 60 PRINT"[158] WRITTEN IN 1990":PRINT 70 PRINT 80 PRINT" DAS ERSTE SPIEL IN DER SERIE:":PRINT 90 PRINT"[155] MR.JOKERS TEXTGAMES!" 110 L1=54272:L2=54279:L3=54286 120 H1=L1+1:H2=L2+1:H3=L3+1 130 V1=L1+4:V2=L2+4:V3=L3+4 140 POKE 54296,15 150 POKE V1+1,9:POKE V2+2,0 160 POKE V2+1,36:POKE V2+2,36 170 POKE V3+1,18:POKE V3+2,170 180 T=TI 200 POKE V1,16:POKE V2,32:POKE V3,16 210 READ S:IF S=0 GOTO 290 220 READ X1,Y1,X2,Y2,X3,Y3 230 IF X1 THEN POKE H1,X1:POKE L1,Y1:POKE V1,17 240 IF X2 THEN POKE H2,X2:POKE L2,Y2:POKE V2,33 250 IF X3 THEN POKE H3,X3:POKE L3,Y3:POKE V3,17 260 T=T+S 270 IF T>TI GOTO 270 280 GOTO 200 290 FORJ=L1 TO 54296:POKE J,0:NEXT J 295 : 300 DATA 15,35,00,70,66,44,00 310 DATA 15,00,00,66,66,0,0 320 DATA 15,35,000,52,66,00,000 330 DATA 15,00,00,70,66,00,0 340 DATA 15,46,00,70,33,00,000 350 DATA 15,46,000,66,33,35,0 360 DATA 15,46,000,52,33,35,00 370 DATA 15,00,0,00,000,0,0 400 DATA 15,52,00,70,33,39, 410 DATA 15,00,00,66,000,0,0 420 DATA 15,52,000,52,000,00,000 430 DATA 15,00,00,70,000,00,0 440 DATA 15,46,00,70,000,0,000 450 DATA 15,00,0,66,000,00,0 460 DATA 15,46,00,52,000,00,00 470 DATA 15,00,0,39,00,00,000 500 DATA 15,35,66,44,000,70,000 510 DATA 15,39,66,00,000,00,0 520 DATA 15,35,66,44,000,70,000 530 DATA 15,39,66,00,00,52,0 540 DATA 15,35,66,46,000,0,00 550 DATA 15,39,66,00,00,105,0 560 DATA 15,35,66,46,000,00,000 570 DATA 15,39,66,00,000,105,0 600 DATA 15,39,00,39,000,116,000 610 DATA 15,00,000,00,000,00,0 620 DATA 15,44,000,39,000,142,0 630 DATA 15,44,00,39,00,116,0 640 DATA 15,00,00,35,000,173,0 650 DATA 15,39,0,35,000,160,0 660 DATA 15,00,00,00,000,140,0 670 DATA 15,35,35,35,35,35,35 700 DATA 0 710 POKE53281,4:PRINT"[158]":PRINT:POKE53280,10 720 PRINT"[147]":PRINT:PRINT" HALLO " 730 PRINT" [196][195][196][195][196][195][196]" 750 PRINT" HIER SPRICHT MR.JOKER.":PRINT 760 PRINT" WILLKOMMEN ZU MEIN ERSTES":PRINT 770 PRINT" WERK IN DER SERIE TEXTGAMES!":PRINT 780 PRINT" ICH HOFFE IHR WERDET VIEL":PRINT 790 PRINT" FREUDE AN DIESEM SPIEL ":PRINT 800 PRINT" HABEN,DENN ES HAT SEHR":PRINT 810 PRINT" VIEL ZEIT GEKOSTET ES":PRINT 820 PRINT" ZU SCHREIBEN.":PRINT:PRINT 830 PRINT" (RETURN)[158]" 840 GETA$:IFA$=""THEN840 845 GETA$:IFA$=""THEN845 850 PRINT"[147]":PRINT:PRINT 860 PRINT" KENNST DU DIE SPIELREGELN?":PRINT 870 GETB$:IFB$=""THEN 870 875 IFB$="J"THEN GOTO1690 880 PRINT"[147]":PRINT:PRINT 890 PRINT" DIE STORY!" 900 PRINT" [195][195][195][195][195][195][195][195][195][195][195][195]":PRINT 910 PRINT" ES IST EIN HEISSER SOMMERTAG UND DU":PRINT 920 PRINT" ARBEITEST,WENN MAN DAS ARBEIT NENNEN":PRINT 930 PRINT" KANN.DEIN BERUF IST NAEMLICH DIEB.":PRINT 940 PRINT" DU UEBERFAELLST PASSANTEN,KNACKST ":PRINT 950 PRINT" AUTOS U.S.W. AN EINER ECKE STEHT":PRINT 960 PRINT" EIN MANN MIT EINEN UMHANG.DER SOLL":PRINT 970 PRINT" DEIN NAECHSTES OPFER SEIN.DU ":PRINT 980 PRINT" SCHLEICHST DICH AN UND GREIFST IN":PRINT 990 PRINT" SEINE TASCHE...........":PRINT:PRINT 995 PRINT" (RETURN)[158]" 1000 GETA$:IFA$=""THEN1000 1010 PRINT:PRINT:PRINT" DER MANN MERKT DAS.ER ZIEHT EINE MG":PRINT 1020 PRINT" UND SAGT:SEHR GUT,EIN DIEB.BIST DU ":PRINT 1030 PRINT" DU EIN PROFI? DU ANTWORTEST MIT:JA!":PRINT 1040 PRINT" DAS TRIFFT SICH GUT.DARF ICH MICH ":PRINT 1050 PRINT" VORSTELLEN? >TORNANDO BRUTALOS<":PRINT 1060 PRINT" ICH BIN GANGSTERBOSS! ":PRINT 1070 PRINT" DIR ZITTERN DIE KNIE UND DU SAGST:":PRINT 1080 PRINT" BITTE TOETE MICH NICHT!ICH MACH ALLES":PRINT 1090 PRINT" TORNANDO ANTWORTET:NA GUT!BESCHAFFE":PRINT 1100 PRINT" MIR 60.000$ SONST BRINGEN DICH MEINE":PRINT 1110 PRINT" MAENNER UM.SIE WERDEN DICH BEOBACHTEN!":PRINT 1120 PRINT" (RETURN)[158]" 1130 GETA$:IFA$=""THEN1130 1140 PRINT 1150 PRINT" DANN SAGT ER:WENN DU DAS GELD HAST,":PRINT 1160 PRINT" DANN KOMM IN MEIN HAUPTQARTIER IN DER":PRINT 1170 PRINT" BAKERSTREET!UND WAGE ES NICHT,MIR DIE":PRINT 1180 PRINT" BULLEN AUF DEN HALS ZU HETZEN,SONST..":PRINT 1190 PRINT" ...................":PRINT 1200 PRINT" WEITER REDET ER NICHT.ER LACHT NUR":PRINT 1210 PRINT" DANN BIEGT ER IN EINE DUNKLE STRASSE":PRINT 1220 PRINT" EIN.DIE BAKERSTREET!":PRINT 1230 PRINT" DU HAST ANGST UM DEIN LEBEN UND ":PRINT 1240 PRINT" DESHALB BESCHLIESST DU DAS GELD ZU":PRINT 1250 PRINT" BESORGEN.":PRINT 1260 PRINT" (RETURN)[158]" 1270 GETA$:IFA$=""THEN1270 1280 PRINT"[147]":POKE53280,0:POKE53281,11:PRINT"[155]":PRINT:PRINT 1290 PRINT" DIE TASTATUR!" 1300 PRINT" ==============":PRINT 1310 PRINT" " 1320 PRINT" P " 1330 PRINT" [194] " 1340 PRINT" A[195][215][195]S " 1350 PRINT" [194] " 1360 PRINT" L ":PRINT 1370 PRINT" P=EIN SCHRITT HOCH ":PRINT 1380 PRINT" L=EIN SCHRITT RUNTER ":PRINT 1390 PRINT" A=EIN SCHRITT LINK ":PRINT 1400 PRINT" S=EIN SCHRITT RECHTS ":PRINT 1410 PRINT:PRINT" H=HILFE(UEBERSICHT) ":PRINT 1420 PRINT:PRINT:PRINT" (RETURN)[155]" 1430 GETA$:IFA$=""THEN1430 1440 PRINT"[147]":PRINT:PRINT 1450 PRINT" DIE KARTE!" 1460 PRINT" [184][184][184][184][184][184][184][184][184][184]":PRINT 1470 PRINT" ZEICHEN BEDEUTUNG" 1480 PRINT" -----------------------------------":PRINT 1490 PRINT"[144] S[146] START":PRINT 1500 PRINT"[144] E[146] HAUPTQARTIER":PRINT 1510 PRINT" W[146] WAFFENLADEN":PRINT 1520 PRINT" [169][146]" 1530 PRINT" B[146] BANK":PRINT 1540 PRINT"[150] J JUVELIERGESCHAEFT":PRINT 1550 PRINT"[159] [216] PASSANTEN":PRINT 1555 GETA$:IFA$=""THEN1555 1560 PRINT"[150] [215] AUTOS":PRINT 1570 PRINT"[158] [218] AUTOMATEN":PRINT 1580 PRINT" A ALKOHOLLADEN":PRINT 1590 PRINT"[156] $ AN & VERKAUF":PRINT 1600 PRINT" ? RISIKOSPIEL":PRINT 1610 PRINT"[144] ..... DEINE SCHRITTE":PRINT:PRINT 1620 PRINT" (RETURN)" 1630 GETA$:IFA$=""THEN1630 1640 PRINT"[147]":PRINT:PRINT 1650 PRINT" SO! DAS WAREN DIE SPIELREGELN!":PRINT 1660 PRINT" MOECHTEST DU SIE NOCH EINMAL SEHEN?" 1670 GETA$:IFA$=""THEN1670 1680 IFA$="J"THEN PRINT"[158]":GOTO880 1690 PRINT"[147]":PRINT 1700 PRINT" BEVOR DAS SPIEL ANFAENGT MOECHTE ICH":PRINT 1710 PRINT" NOCH EINIGES LOSWERDEN:":PRINT 1720 PRINT" ICH GRUESSE: ALFPOWER,THE C.C.S." 1730 PRINT" DR.ROLL,RETORTENBABY" 1740 PRINT" GIANA-SISTERS,BADSVEN" 1750 PRINT" DOC.BUNTSPECHT,K.W." 1760 PRINT" MR.PLAYBOY.........":PRINT:PRINT 1770 PRINT" MUSIK : MR.JOKER":PRINT 1780 PRINT" GRAFIK: MR.JOKER":PRINT 1790 PRINT" STORY : MR.JOKER":PRINT 1800 PRINT:PRINT" (RETURN)" 1810 GETA$:IFA$=""THEN1810 10000 PRINT"[147]":POKE53281,0:PRINT"[144]" 10010 PRINT"LOAD DIEB LOADER ,8,1":PRINT:PRINT:PRINT:PRINT:PRINT"RUN" 10020 PRINT" (RETURN) NACH LADEN RETURN[144]" 10025 POKE1148,34:POKE1160,34 10030 PRINT"" 10040 NEW